home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / J-M / Kids El Verbo Simple.cpt / El Verbo Simple 1.1 / card_73808.txt < prev    next >
Text File  |  1990-11-11  |  3KB  |  131 lines
  1. -- card: 73808 from stack: in.1
  2. -- bmap block id: 75396
  3. -- flags: 4000
  4. -- background id: 72461
  5. -- name: 
  6.  
  7.  
  8. -- part 20 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=31 top=281 right=314 bottom=266
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Home
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   visual effect dissolve
  23.   go home
  24. end mouseUp
  25.  
  26.  
  27.  
  28. -- part 21 (button)
  29. -- low flags: 00
  30. -- high flags: 0000
  31. -- rect: left=33 top=153 right=190 bottom=444
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 1
  35. -- font id: 0
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 16
  39. -- part name: Conjugator
  40. ----- HyperTalk script -----
  41. on mouseUp
  42.   visual effect dissolve
  43.   go to first card of bg id 2629
  44. end mouseUp
  45.  
  46.  
  47.  
  48. -- part 22 (button)
  49. -- low flags: 00
  50. -- high flags: 0000
  51. -- rect: left=32 top=200 right=228 bottom=459
  52. -- title width / last selected line: 0
  53. -- icon id / first selected line: 0 / 0
  54. -- text alignment: 1
  55. -- font id: 0
  56. -- text size: 12
  57. -- style flags: 0
  58. -- line height: 16
  59. -- part name: Reference
  60. ----- HyperTalk script -----
  61. on mouseUp
  62.   push card
  63.   visual effect dissolve
  64.   go to card id 59196
  65. end mouseUp
  66.  
  67.  
  68.  
  69. -- part 30 (button)
  70. -- low flags: 00
  71. -- high flags: 0000
  72. -- rect: left=34 top=117 right=146 bottom=439
  73. -- title width / last selected line: 0
  74. -- icon id / first selected line: 0 / 0
  75. -- text alignment: 1
  76. -- font id: 0
  77. -- text size: 12
  78. -- style flags: 0
  79. -- line height: 16
  80. -- part name: More Information
  81. ----- HyperTalk script -----
  82. on mouseUp
  83.   visual effect dissolve
  84.   go to card id 75564
  85. end mouseUp
  86.  
  87.  
  88.  
  89. -- part 31 (button)
  90. -- low flags: 00
  91. -- high flags: 0000
  92. -- rect: left=32 top=238 right=271 bottom=370
  93. -- title width / last selected line: 0
  94. -- icon id / first selected line: 0 / 0
  95. -- text alignment: 1
  96. -- font id: 0
  97. -- text size: 12
  98. -- style flags: 0
  99. -- line height: 16
  100. -- part name: Quiz
  101. ----- HyperTalk script -----
  102. on mouseUp
  103.   Global Subject
  104.   Global FmrTense, PrevSubject, Answer
  105.   visual dissolve
  106.   go to card id 76666
  107.   set cursor to watch
  108.   put 0 into FmrTense
  109.   put 0 into PrevSubject
  110.   if item 1 of Subject is empty then
  111.     PutSubject "Yo",1
  112.     PutSubject "Tu",2
  113.     PutSubject "Ud.",3
  114.     PutSubject "Nosotros",4
  115.     PutSubject "Vosotros",5
  116.     PutSubject "Uds.",6
  117.     PutTense "Present",1
  118.     PutTense "Preterite",2
  119.     PutTense "Imperfect",3
  120.     PutTense "Future",4
  121.     PutTense "Conditional",5
  122.     PutTense "Progressive",6
  123.     PutTense "Compound",7
  124.     PutTense "Subjunctive",8
  125.   end if
  126.   DoQuestion
  127.   set cursor to browse
  128. end mouseUp
  129.  
  130.  
  131.